home *** CD-ROM | disk | FTP | other *** search
/ 64'er / 64ER_CD.iso / sh3x / sh37d.d64 / listing 3.sprite (.txt) < prev    next >
Commodore BASIC  |  1995-03-30  |  241b  |  17 lines
  1. 200 V=53248
  2. 220 POKE V+21,1+2
  3. 230 POKE V+39,1
  4. 231 POKE V+40,1
  5. 240 POKE V+0,150
  6. 241 POKE V+1,120
  7. 242 POKE V+2,120
  8. 243 POKE 2040,32
  9. 280 POKE 2040,32
  10. 281 POKE 2041,33
  11. 300 BW=BW+1
  12. 310 BH=INT(BW/256):BL=BW-BH*256
  13. 320 POKE V+0,BL
  14. 330 POKE V+16,BH
  15. 340 IF BW>320 THEN BW=0
  16. 350 GOTO 300
  17.